home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Gold Collection / Software Vault - The Gold Collection (American Databankers) (1993).ISO / cdr53 / 122_01.zip / ARITH < prev    next >
Text File  |  1993-06-02  |  2KB  |  78 lines
  1. PISTOL'S ARITHMETIC OPERATORS:
  2. copyright (C) 1983 by E. E. Bergmann
  3. operators defined in alphabetical(ASCII) order
  4. meaning of NTT,TOS
  5. :
  6. ::
  7. *********************************************************
  8. *                            *
  9. * PISTOL-Portably Implemented Stack Oriented Language    *
  10. *            Version 2.0            *
  11. * (C) 1983 by    Ernest E. Bergmann            *
  12. *        Physics, Building #16            *
  13. *        Lehigh Univerisity            *
  14. *        Bethlehem, Pa. 18015            *
  15. *                            *
  16. * Permission is hereby granted for all reproduction and *
  17. * distribution of this material provided this notice is *
  18. * included.                        *
  19. *                            *
  20. *********************************************************
  21. :
  22. ::
  23. /    NTT TOS --> NTT/TOS
  24.  
  25. /MOD    NTT TOS --> (NTT/TOS) (NTT MOD TOS), see MOD
  26.  
  27. *    NTT TOS --> NTT*TOS
  28.  
  29. +    NTT TOS --> NTT+TOS
  30.  
  31. -    NTT TOS --> NTT-TOS
  32.  
  33. 1+    TOS --> TOS+1
  34.  
  35. 1+W!    TOS -->
  36.     Increments word location pointed to by TOS by 1.
  37.  
  38. 1-    TOS --> TOS-1
  39.  
  40. 3W-    TOS --> TOS-3*W
  41.  
  42. ABS    TOS -->ABS(TOS)
  43.  
  44. MAX    NTT TOS --> MAX(NTT,TOS), signed comparisons
  45.  
  46. MIN    NTT TOS --> MIN(NTT,TOS), signed comparisons
  47.  
  48. MINUS    TOS --> -TOS
  49.  
  50. MOD    NTT TOS --> (NTT MOD TOS), sign from NTT
  51.     examples: 1234 10 --> 4
  52.         -1234 10 --> -4
  53.         1234 -10 --> 4
  54.         -1234 -10 --> -4
  55.  
  56. TRANS    TOS --> USER+W*TOS
  57.  
  58. TRANS@    'TRANS@ : TRANS @ ;
  59.  
  60. USER+    TOS --> TOS+USER
  61.  
  62. W*    TOS --> TOS*W
  63.  
  64. W+    TOS --> TOS+W
  65.  
  66. W+W!    TOS -->
  67.     Increments word location pointed to by TOS by W.
  68.  
  69. W-    TOS --> TOS-W
  70.  
  71. :
  72. ::
  73.     TOS - "Top Of Stack"
  74.  
  75.     NTT - "Next to Top of stack"
  76. :
  77. or all reproduction and *
  78. * distribution of this ma